unit NTComponentReg; 

{$IFDEF FPC}
{$mode objfpc}{$H+}
{$ENDIF}

interface

procedure Register;

implementation

uses
  NTCustomControls, TDIPageControl, NTZPooling, ZPropertyEditor,

{$IFDEF FPC}
  PropEdits, ComponentEditors, LResources,
{$ELSE}
{$IFNDEF VER130BELOW}
  DesignIntf,
{$ELSE}
  DsgnIntf,
{$ENDIF}
{$ENDIF}
  Classes;

procedure Register;
begin
  RegisterComponents('NTech Controls', [TNTEdit, TNTNumericEdit, TNTComboBox, TNTMaskEdit,
                                        TNTCheckBox, TNTRadioButton, TNTMemo]);

  RegisterComponents('NTech TDI', [TTDIPageControl]);

  RegisterComponents('NTech Database', [TNTZPooling]);

  RegisterPropertyEditor(TypeInfo(string), TNTZPooling, 'Protocol',
    TZProtocolPropertyEditor);
  {RegisterPropertyEditor(TypeInfo(string), TNTZPooling, 'Database',
    TZDatabasePropertyEditor); }
  RegisterPropertyEditor(TypeInfo(string), TNTZPooling, 'Catalog',
    TZCatalogPropertyEditor);
end;

end.

